home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / hypercar / xcmd / xrulesde.sit / Xrules™ Demo / card_2162.txt < prev    next >
Encoding:
Text File  |  1991-06-24  |  1.2 KB  |  60 lines
  1. -- card: 2162 from stack: in
  2. -- bmap block id: 2435
  3. -- flags: 4000
  4. -- background id: 5394
  5. -- name: init
  6.  
  7.  
  8. -- part 6 (button)
  9. -- low flags: 00
  10. -- high flags: 8003
  11. -- rect: left=352 top=194 right=210 bottom=466
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: forward chain
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   global ilsi_trace, ilsi_facts, ilsi_stack, ilsi_step, direction
  23.  
  24.   put "" into ilsi_trace
  25.   put "" into ilsi_facts
  26.   put "" into ilsi_stack
  27.   put "" into ilsi_step
  28.   put "forward" into direction
  29.   initXrules
  30.   chain direction
  31. end mouseUp
  32.  
  33.  
  34.  
  35. -- part 9 (button)
  36. -- low flags: 00
  37. -- high flags: 8003
  38. -- rect: left=352 top=223 right=239 bottom=466
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 0 / 0
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: backward chain
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   global ilsi_trace, ilsi_facts, ilsi_stack, ilsi_step, direction
  50.  
  51.   put "" into ilsi_trace
  52.   put "" into ilsi_facts
  53.   put "" into ilsi_stack
  54.   put "" into ilsi_step
  55.   put "backward" into direction
  56.   initXrules "model"
  57.   chain direction
  58. end mouseUp
  59.  
  60.